home *** CD-ROM | disk | FTP | other *** search
-
- /*
- InvisiWin FKey #7 -- Version 1.00 -- Nov 28, 1988
-
- Copyright (c) 1988 by Neal E. Trautman
-
- 'ShareWare' -- Please send $3 contribution to:
- Neal Trautman
- 1701 S.W. 42nd Street
- Fargo, ND 58103
-
- This FKey makes the content region of the front window transparent.
- (If it is already transparent, the content region returns)
- */
-
- main()
- {
- register WindowPeek win;
- register RgnHandle oldContent;
-
- win = (WindowPeek)FrontWindow();
- if (win)
- {
- oldContent = win->contRgn;
- if (EmptyRgn(oldContent))
- {
- ShowHide(win,FALSE);
- ShowHide(win,TRUE);
- }
- else
- {
- win->contRgn = NewRgn();
- DiffRgn(win->strucRgn,oldContent,win->strucRgn);
- CalcVisBehind(win,oldContent);
- PaintBehind(win,oldContent);
- DisposeRgn(oldContent);
- }
- }
- else
- SysBeep(2L);
- }
-